Manages an Address Book group.
Example
This example gets the names of the groups in the current user's Address Book and displays them in a ListBox.
Dim book as AddressBook
Dim groups() as AddressBookGroup
Dim i as Integer
book= System.AddressBook
groups=book.Groups
For i=0 to Ubound(groups)
ListBox1.addrow groups(i).name
Next
Dim groups() as AddressBookGroup
Dim i as Integer
book= System.AddressBook
groups=book.Groups
For i=0 to Ubound(groups)
ListBox1.addrow groups(i).name
Next
This example gets two Contact fields from the first group and displays them in a ListBox.
Dim book as AddressBook
Dim groups() as AddressBookGroup
Dim contacts() as AddressBookContact
Dim i as Integer
book= System.AddressBook
groups=book.Groups //get the array of groups, assume at least one group
contacts=groups(0).contacts //get array of contacts in first group
For i=0 to Ubound(Contacts)
ListBox1.addrow contacts(i).CompanyName
ListBox1.cell(i,1)=contacts(i).LastName
Next
Dim groups() as AddressBookGroup
Dim contacts() as AddressBookContact
Dim i as Integer
book= System.AddressBook
groups=book.Groups //get the array of groups, assume at least one group
contacts=groups(0).contacts //get array of contacts in first group
For i=0 to Ubound(Contacts)
ListBox1.addrow contacts(i).CompanyName
ListBox1.cell(i,1)=contacts(i).LastName
Next
See Also
AddressBook, AddressBookAddress, AddressBookContact, AddressBookData, AddressBookRecord classes.